home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / TRUNCFIL.DMO < prev    next >
Text File  |  1988-12-18  |  492b  |  22 lines

  1. main(argc,argv)
  2. int argc;
  3. char **argv;
  4. {
  5.   long atol();
  6.  
  7.   if (argc < 4) {
  8.     printf("\nUsage:  TRUNCATE <Filename> <Original Size> <New Size>");
  9.     exit(1);
  10.   }
  11.  
  12.   if (filesize(argv[1]) == 0L || atol(argv[2]) != filesize(argv[1])) {
  13.     printf("\nUnable to truncate %s",argv[1]);
  14.     exit(1);
  15.   }
  16.  
  17.   if (truncate(argv[1],atol(argv[3])))
  18.     printf("\nError truncating %s",argv[1]);
  19.   else
  20.     printf("FILE: %s, changed from %s to %s bytes",argv[1],argv[2],argv[3]);
  21. }
  22.